DEFINITION MODULE WindSet;

(*
WindSet - Functions.

UK __DATE__ __TIME__
*)

(*DEF_SWITCHES*)

FROM AES     IMPORT TreePtr,ObjectIndex;
FROM WindMgr IMPORT WindowElement;
FROM RcMgr   IMPORT GRect;
FROM PORTAB  IMPORT UNSIGNEDWORD,SIGNEDWORD;

(* WFKind *)

PROCEDURE Kind(Handle: SIGNEDWORD; Kind: WindowElement);

(* WFName *)

PROCEDURE Name(Handle: SIGNEDWORD; VAR Name: ARRAY OF CHAR);

(* WFInfo *)

PROCEDURE Info(Handle: SIGNEDWORD; VAR Info: ARRAY OF CHAR);

(* WFWorkXYWH *)

(* WFCurrXYWH *)

PROCEDURE CurrXYWH(Handle: SIGNEDWORD; VAR Rect: GRect);

(* WFPrevXYWH *)

(* WFFullXYWH *)

(* WFHSlide *)

PROCEDURE HSlide(Handle: SIGNEDWORD; Pos: UNSIGNEDWORD);

(* WFVSlide *)

PROCEDURE VSlide(Handle: SIGNEDWORD; Pos: UNSIGNEDWORD);

(* WFTop *)

PROCEDURE Top(Handle: SIGNEDWORD);

(* WFFirstXYWH *)

(* WFNextXYWH *)

(* WFNewDesk *)

PROCEDURE NewDesk(PTree: TreePtr; Index: ObjectIndex);

(* WFHSlSize *)

PROCEDURE HSlSize(Handle: SIGNEDWORD; Size: SIGNEDWORD);

(* WFVSlSize *)

PROCEDURE VSlSize(Handle: SIGNEDWORD; Size: SIGNEDWORD);

(* WFScreen *)

(* WFTopAttrb *)

PROCEDURE TAttrb(Handle: SIGNEDWORD; IsTop: BOOLEAN);

(* WFColor *)

(* WFSizTop *)

PROCEDURE SizTop(Handle: SIGNEDWORD; VAR Rect: GRect);

(* WFDColor *)

(* WFTopAp *)

(* WFOwner *)

(* WFBack *)

PROCEDURE Back(Handle: SIGNEDWORD);

(* WFBEvent *)

PROCEDURE BEvent(Handle: SIGNEDWORD; OnOff: BOOLEAN);

(* WFBottom *)

PROCEDURE Bottom(Handle: SIGNEDWORD);

END WindSet.
